home *** CD-ROM | disk | FTP | other *** search
/ LOGIC Apps / Logic-APPLE_II_APPS.iso / mac / LOGIC Apple II 5.25" Library - ProDOS / PRO009.dsk / COPY.FILES / PD.COPY.asm < prev    next >
Assembly Source File  |  2012-02-16  |  16KB  |  671 lines
  1. 0000- AD 82 C0  LDA $C082
  2. 0003- A9 95     LDA #$95
  3. 0005- 20 ED FD  JSR $FDED
  4. 0008- 8D 0C C0  STA $C00C
  5. 000B- 20 89 FE  JSR $FE89
  6. 000E- 20 93 FE  JSR $FE93
  7. 0011- 8D 00 C0  STA $C000
  8. 0014- 20 2F FB  JSR $FB2F
  9. 0017- A2 18     LDX #$18
  10. 0019- A9 00     LDA #$00
  11. 001B- A8        TAY
  12. 001C- 9D 57 BF  STA $BF57,X
  13. 001F- CA        DEX
  14. 0020- D0 FA     BNE $001C
  15. 0022- A9 CF     LDA #$CF
  16. 0024- 8D 58 BF  STA $BF58
  17. 0027- A9 3F     LDA #$3F
  18. 0029- 8D 6F BF  STA $BF6F
  19. 002C- A9 00     LDA #$00
  20. 002E- 85 02     STA $02
  21. 0030- A9 BA     LDA #$BA
  22. 0032- 85 03     STA $03
  23. 0034- A9 5F     LDA #$5F
  24. 0036- 85 00     STA $00
  25. 0038- A9 20     LDA #$20
  26. 003A- 85 01     STA $01
  27. 003C- B1 00     LDA ($00),Y
  28. 003E- 91 02     STA ($02),Y
  29. 0040- C8        INY
  30. 0041- D0 F9     BNE $003C
  31. 0043- E6 01     INC $01
  32. 0045- E6 03     INC $03
  33. 0047- A5 03     LDA $03
  34. 0049- C9 BF     CMP #$BF
  35. 004B- 90 EF     BCC $003C
  36. 004D- A9 CA     LDA #$CA
  37. 004F- 8D F2 03  STA $03F2
  38. 0052- A9 BC     LDA #$BC
  39. 0054- 8D F3 03  STA $03F3
  40. 0057- 49 A5     EOR #$A5
  41. 0059- 8D F4 03  STA $03F4
  42. 005C- 4C 00 BA  JMP $BA00
  43. 005F- 20 58 FC  JSR $FC58
  44. 0062- A9 60     LDA #$60
  45. 0064- 8D D2 BE  STA $BED2
  46. 0067- 20 90 BE  JSR $BE90
  47. 006A- A0 A0     LDY #$A0
  48. 006C- A0 A0     LDY #$A0
  49. 006E- A0 A0     LDY #$A0
  50. 0070- A0 A0     LDY #$A0
  51. 0072- A0 A0     LDY #$A0
  52. 0074- A0 A0     LDY #$A0
  53. 0076- D0 F2     BNE $006A
  54. 0078- EF        ???
  55. 0079- C4 CF     CPY $CF
  56. 007B- D3        ???
  57. 007C- A0 E4     LDY #$E4
  58. 007E- E9 F3     SBC #$F3
  59. 0080- EB        ???
  60. 0081- A0 E3     LDY #$E3
  61. 0083- EF        ???
  62. 0084- F0 F9     BEQ $007F
  63. 0086- 8D 8D CF  STA $CF8D
  64. 0089- F2        ???
  65. 008A- E9 E7     SBC #$E7
  66. 008C- E9 EE     SBC #$EE
  67. 008E- E1 EC     SBC ($EC,X)
  68. 0090- A0 F3     LDY #$F3
  69. 0092- EC EF F4  CPX $F4EF
  70. 0095- A0 BA     LDY #$BA
  71. 0097- A0 B6     LDY #$B6
  72. 0099- 88        DEY
  73. 009A- 00        BRK
  74. 009B- 20 0C FD  JSR $FD0C
  75. 009E- C9 8D     CMP #$8D
  76. 00A0- F0 12     BEQ $00B4
  77. 00A2- C9 B0     CMP #$B0
  78. 00A4- 90 B9     BCC $005F
  79. 00A6- C9 B8     CMP #$B8
  80. 00A8- B0 B5     BCS $005F
  81. 00AA- 20 ED FD  JSR $FDED
  82. 00AD- 0A        ASL
  83. 00AE- 0A        ASL
  84. 00AF- 0A        ASL
  85. 00B0- 0A        ASL
  86. 00B1- 8D D2 BE  STA $BED2
  87. 00B4- 20 90 BE  JSR $BE90
  88. 00B7- 8D CF F2  STA $F2CF
  89. 00BA- E9 E7     SBC #$E7
  90. 00BC- E9 EE     SBC #$EE
  91. 00BE- E1 EC     SBC ($EC,X)
  92. 00C0- A0 E4     LDY #$E4
  93. 00C2- F2        ???
  94. 00C3- E9 F6     SBC #$F6
  95. 00C5- E5 BA     SBC $BA
  96. 00C7- A0 B1     LDY #$B1
  97. 00C9- 88        DEY
  98. 00CA- 00        BRK
  99. 00CB- 20 0C FD  JSR $FD0C
  100. 00CE- C9 8D     CMP #$8D
  101. 00D0- F0 15     BEQ $00E7
  102. 00D2- C9 B1     CMP #$B1
  103. 00D4- F0 11     BEQ $00E7
  104. 00D6- C9 B2     CMP #$B2
  105. 00D8- F0 03     BEQ $00DD
  106. 00DA- 4C 00 BA  JMP $BA00
  107. 00DD- 20 ED FD  JSR $FDED
  108. 00E0- 0E D2 BE  ASL $BED2
  109. 00E3- 38        SEC
  110. 00E4- 6E D2 BE  ROR $BED2
  111. 00E7- 20 90 BE  JSR $BE90
  112. 00EA- 8D 8D C4  STA $C48D
  113. 00ED- E5 F3     SBC $F3
  114. 00EF- F4        ???
  115. 00F0- E9 EE     SBC #$EE
  116. 00F2- E1 F4     SBC ($F4,X)
  117. 00F4- E9 EF     SBC #$EF
  118. 00F6- EE A0 F3  INC $F3A0
  119. 00F9- EC EF F4  CPX $F4EF
  120. 00FC- A0 BA     LDY #$BA
  121. 00FE- A0 00     LDY #$00
  122. 0100- AD D2 BE  LDA $BED2
  123. 0103- 49 80     EOR #$80
  124. 0105- 8D D8 BE  STA $BED8
  125. 0108- 4A        LSR
  126. 0109- 4A        LSR
  127. 010A- 4A        LSR
  128. 010B- 4A        LSR
  129. 010C- 29 07     AND #$07
  130. 010E- 09 B0     ORA #$B0
  131. 0110- 20 ED FD  JSR $FDED
  132. 0113- A9 88     LDA #$88
  133. 0115- 20 ED FD  JSR $FDED
  134. 0118- 20 0C FD  JSR $FD0C
  135. 011B- C9 8D     CMP #$8D
  136. 011D- F0 12     BEQ $0131
  137. 011F- C9 B0     CMP #$B0
  138. 0121- 90 45     BCC $0168
  139. 0123- C9 B8     CMP #$B8
  140. 0125- B0 41     BCS $0168
  141. 0127- 20 ED FD  JSR $FDED
  142. 012A- 0A        ASL
  143. 012B- 0A        ASL
  144. 012C- 0A        ASL
  145. 012D- 0A        ASL
  146. 012E- 8D D8 BE  STA $BED8
  147. 0131- 20 90 BE  JSR $BE90
  148. 0134- 8D C4 E5  STA $E5C4
  149. 0137- F3        ???
  150. 0138- F4        ???
  151. 0139- E9 EE     SBC #$EE
  152. 013B- E1 F4     SBC ($F4,X)
  153. 013D- E9 EF     SBC #$EF
  154. 013F- EE A0 E4  INC $E4A0
  155. 0142- F2        ???
  156. 0143- E9 F6     SBC #$F6
  157. 0145- E5 BA     SBC $BA
  158. 0147- A0 00     LDY #$00
  159. 0149- AD D8 BE  LDA $BED8
  160. 014C- 0A        ASL
  161. 014D- A9 B1     LDA #$B1
  162. 014F- 69 00     ADC #$00
  163. 0151- 20 ED FD  JSR $FDED
  164. 0154- A9 88     LDA #$88
  165. 0156- 20 ED FD  JSR $FDED
  166. 0159- 20 0C FD  JSR $FD0C
  167. 015C- C9 8D     CMP #$8D
  168. 015E- F0 17     BEQ $0177
  169. 0160- C9 B1     CMP #$B1
  170. 0162- F0 07     BEQ $016B
  171. 0164- C9 B2     CMP #$B2
  172. 0166- F0 03     BEQ $016B
  173. 0168- 4C 00 BA  JMP $BA00
  174. 016B- 20 ED FD  JSR $FDED
  175. 016E- 0E D8 BE  ASL $BED8
  176. 0171- 49 B1     EOR #$B1
  177. 0173- 4A        LSR
  178. 0174- 6E D8 BE  ROR $BED8
  179. 0177- AD D8 BE  LDA $BED8
  180. 017A- CD D2 BE  CMP $BED2
  181. 017D- F0 E9     BEQ $0168
  182. 017F- 20 7B BE  JSR $BE7B
  183. 0182- D0 E4     BNE $0168
  184. 0184- AD D2 BE  LDA $BED2
  185. 0187- 20 7B BE  JSR $BE7B
  186. 018A- D0 DC     BNE $0168
  187. 018C- AD D2 BE  LDA $BED2
  188. 018F- 8D F0 BE  STA $BEF0
  189. 0192- 20 7A BC  JSR $BC7A
  190. 0195- AD E2 BE  LDA $BEE2
  191. 0198- 85 02     STA $02
  192. 019A- AD E3 BE  LDA $BEE3
  193. 019D- 85 03     STA $03
  194. 019F- C9 10     CMP #$10
  195. 01A1- 90 03     BCC $01A6
  196. 01A3- 4C 3C BC  JMP $BC3C
  197. 01A6- AD E5 BE  LDA $BEE5
  198. 01A9- 85 04     STA $04
  199. 01AB- AD E6 BE  LDA $BEE6
  200. 01AE- 85 05     STA $05
  201. 01B0- A9 B8     LDA #$B8
  202. 01B2- 8D D4 BE  STA $BED4
  203. 01B5- A9 02     LDA #$02
  204. 01B7- 8D D5 BE  STA $BED5
  205. 01BA- A9 00     LDA #$00
  206. 01BC- 8D D6 BE  STA $BED6
  207. 01BF- 20 00 BF  JSR $BF00
  208. 01C2- 80        ???
  209. 01C3- D1 BE     CMP ($BE),Y
  210. 01C5- 90 03     BCC $01CA
  211. 01C7- 4C A3 BC  JMP $BCA3
  212. 01CA- AD 27 B8  LDA $B827
  213. 01CD- 8D D5 BE  STA $BED5
  214. 01D0- AD 28 B8  LDA $B828
  215. 01D3- 8D D6 BE  STA $BED6
  216. 01D6- 20 00 BF  JSR $BF00
  217. 01D9- 80        ???
  218. 01DA- D1 BE     CMP ($BE),Y
  219. 01DC- B0 E9     BCS $01C7
  220. 01DE- A2 00     LDX #$00
  221. 01E0- 86 00     STX $00
  222. 01E2- 86 01     STX $01
  223. 01E4- BD 00 B8  LDA $B800,X
  224. 01E7- 0A        ASL
  225. 01E8- 90 06     BCC $01F0
  226. 01EA- E6 00     INC $00
  227. 01EC- D0 02     BNE $01F0
  228. 01EE- E6 01     INC $01
  229. 01F0- D0 F5     BNE $01E7
  230. 01F2- E8        INX
  231. 01F3- D0 EF     BNE $01E4
  232. 01F5- BD 00 B9  LDA $B900,X
  233. 01F8- 0A        ASL
  234. 01F9- 90 06     BCC $0201
  235. 01FB- E6 00     INC $00
  236. 01FD- D0 02     BNE $0201
  237. 01FF- E6 01     INC $01
  238. 0201- D0 F5     BNE $01F8
  239. 0203- E8        INX
  240. 0204- D0 EF     BNE $01F5
  241. 0206- A5 00     LDA $00
  242. 0208- 18        CLC
  243. 0209- 65 04     ADC $04
  244. 020B- 45 02     EOR $02
  245. 020D- D0 08     BNE $0217
  246. 020F- A5 01     LDA $01
  247. 0211- 65 05     ADC $05
  248. 0213- C5 03     CMP $03
  249. 0215- F0 03     BEQ $021A
  250. 0217- 4C 58 BC  JMP $BC58
  251. 021A- A9 02     LDA #$02
  252. 021C- 20 5B FB  JSR $FB5B
  253. 021F- A9 14     LDA #$14
  254. 0221- 85 24     STA $24
  255. 0223- 20 9C FC  JSR $FC9C
  256. 0226- 20 69 BE  JSR $BE69
  257. 0229- AD D8 BE  LDA $BED8
  258. 022C- 8D F0 BE  STA $BEF0
  259. 022F- 20 7A BC  JSR $BC7A
  260. 0232- AD E2 BE  LDA $BEE2
  261. 0235- C5 02     CMP $02
  262. 0237- D0 35     BNE $026E
  263. 0239- AD E3 BE  LDA $BEE3
  264. 023C- C5 03     CMP $03
  265. 023E- D0 2E     BNE $026E
  266. 0240- A9 08     LDA #$08
  267. 0242- 20 5B FB  JSR $FB5B
  268. 0245- 20 42 FC  JSR $FC42
  269. 0248- 20 90 BE  JSR $BE90
  270. 024B- 8D C4 E5  STA $E5C4
  271. 024E- F3        ???
  272. 024F- F4        ???
  273. 0250- F2        ???
  274. 0251- EF        ???
  275. 0252- F9 A0 00  SBC $00A0,Y
  276. 0255- 20 69 BE  JSR $BE69
  277. 0258- 20 90 BE  JSR $BE90
  278. 025B- A0 BF     LDY #$BF
  279. 025D- 00        BRK
  280. 025E- 20 0C FD  JSR $FD0C
  281. 0261- 29 DF     AND #$DF
  282. 0263- C9 CE     CMP #$CE
  283. 0265- F0 31     BEQ $0298
  284. 0267- C9 D9     CMP #$D9
  285. 0269- D0 F3     BNE $025E
  286. 026B- 4C 12 BD  JMP $BD12
  287. 026E- 20 8B BE  JSR $BE8B
  288. 0271- 8D C4 E9  STA $E9C4
  289. 0274- E6 E6     INC $E6
  290. 0276- E5 F2     SBC $F2
  291. 0278- E5 EE     SBC $EE
  292. 027A- F4        ???
  293. 027B- A0 F3     LDY #$F3
  294. 027D- E9 FA     SBC #$FA
  295. 027F- E5 E4     SBC $E4
  296. 0281- A0 F6     LDY #$F6
  297. 0283- EF        ???
  298. 0284- EC F5 ED  CPX $EDF5
  299. 0287- E5 F3     SBC $F3
  300. 0289- AC A0 E3  LDY $E3A0
  301. 028C- E1 EE     SBC ($EE,X)
  302. 028E- EE EF F4  INC $F4EF
  303. 0291- A0 E3     LDY #$E3
  304. 0293- EF        ???
  305. 0294- F0 F9     BEQ $028F
  306. 0296- AE 00 4C  LDX $4C00
  307. 0299- B8        CLV
  308. 029A- BC 20 8B  LDY $8B20,X
  309. 029D- BE 8D D6  LDX $D68D,Y
  310. 02A0- EF        ???
  311. 02A1- EC F5 ED  CPX $EDF5
  312. 02A4- E5 A0     SBC $A0
  313. 02A6- E9 F3     SBC #$F3
  314. 02A8- A0 F4     LDY #$F4
  315. 02AA- EF        ???
  316. 02AB- EF        ???
  317. 02AC- A0 EC     LDY #$EC
  318. 02AE- E1 F2     SBC ($F2,X)
  319. 02B0- E7        ???
  320. 02B1- E5 AE     SBC $AE
  321. 02B3- 00        BRK
  322. 02B4- 4C B8 BC  JMP $BCB8
  323. 02B7- 20 8B BE  JSR $BE8B
  324. 02BA- 8D C2 E9  STA $E9C2
  325. 02BD- F4        ???
  326. 02BE- A0 ED     LDY #$ED
  327. 02C0- E1 F0     SBC ($F0,X)
  328. 02C2- A0 E3     LDY #$E3
  329. 02C4- EF        ???
  330. 02C5- F5 EE     SBC $EE,X
  331. 02C7- F4        ???
  332. 02C8- A0 E4     LDY #$E4
  333. 02CA- E9 F3     SBC #$F3
  334. 02CC- E3        ???
  335. 02CD- F2        ???
  336. 02CE- E5 F0     SBC $F0
  337. 02D0- E1 EE     SBC ($EE,X)
  338. 02D2- E3        ???
  339. 02D3- F9 AE 00  SBC $00AE,Y
  340. 02D6- 4C B8 BC  JMP $BCB8
  341. 02D9- 20 00 BF  JSR $BF00
  342. 02DC- C5 EF     CMP $EF
  343. 02DE- BE B0 21  LDX $21B0,Y
  344. 02E1- AD C1 02  LDA $02C1
  345. 02E4- 29 0F     AND #$0F
  346. 02E6- 69 01     ADC #$01
  347. 02E8- 8D C0 02  STA $02C0
  348. 02EB- A9 2F     LDA #$2F
  349. 02ED- 8D C1 02  STA $02C1
  350. 02F0- 20 00 BF  JSR $BF00
  351. 02F3- C4 DD     CPY $DD
  352. 02F5- BE B0 0A  LDX $0AB0,Y
  353. 02F8- AD E4 BE  LDA $BEE4
  354. 02FB- C9 0F     CMP #$0F
  355. 02FD- D0 01     BNE $0300
  356. 02FF- 60        RTS
  357. 0300- A9 4A     LDA #$4A
  358. 0302- 48        PHA
  359. 0303- 20 8B BE  JSR $BE8B
  360. 0306- 8D CD CC  STA $CCCD
  361. 0309- C9 A0     CMP #$A0
  362. 030B- E5 F2     SBC $F2
  363. 030D- F2        ???
  364. 030E- EF        ???
  365. 030F- F2        ???
  366. 0310- BA        TSX
  367. 0311- A0 00     LDY #$00
  368. 0313- 68        PLA
  369. 0314- 20 DA FD  JSR $FDDA
  370. 0317- 20 90 BE  JSR $BE90
  371. 031A- 8D 8D C8  STA $C88D
  372. 031D- C9 D4     CMP #$D4
  373. 031F- A0 C1     LDY #$C1
  374. 0321- A0 CB     LDY #$CB
  375. 0323- C5 D9     CMP $D9
  376. 0325- 00        BRK
  377. 0326- 20 0C FD  JSR $FD0C
  378. 0329- 20 8E FD  JSR $FD8E
  379. 032C- 20 00 BF  JSR $BF00
  380. 032F- 65 F3     ADC $F3
  381. 0331- BE 00 20  LDX $2000,Y
  382. 0334- 90 BE     BCC $02F4
  383. 0336- A0 C5     LDY #$C5
  384. 0338- D2        ???
  385. 0339- D2        ???
  386. 033A- CF        ???
  387. 033B- D2        ???
  388. 033C- A0 8D     LDY #$8D
  389. 033E- 8D D4 F9  STA $F9D4
  390. 0341- F0 E5     BEQ $0328
  391. 0343- A0 C3     LDY #$C3
  392. 0345- A0 F4     LDY #$F4
  393. 0347- EF        ???
  394. 0348- A0 E3     LDY #$E3
  395. 034A- EF        ???
  396. 034B- EE F4 E9  INC $E9F4
  397. 034E- EE F5 E5  INC $E5F5
  398. 0351- AC A0 C5  LDY $C5A0
  399. 0354- D3        ???
  400. 0355- C3        ???
  401. 0356- A0 F4     LDY #$F4
  402. 0358- EF        ???
  403. 0359- A0 E1     LDY #$E1
  404. 035B- E2        ???
  405. 035C- EF        ???
  406. 035D- F2        ???
  407. 035E- F4        ???
  408. 035F- AE 8D 00  LDX $008D
  409. 0362- 20 0C FD  JSR $FD0C
  410. 0365- C9 9B     CMP #$9B
  411. 0367- F0 C0     BEQ $0329
  412. 0369- 29 DF     AND #$DF
  413. 036B- C9 C3     CMP #$C3
  414. 036D- D0 F3     BNE $0362
  415. 036F- 18        CLC
  416. 0370- 60        RTS
  417. 0371- A0 22     LDY #$22
  418. 0373- B9 AE BE  LDA $BEAE,Y
  419. 0376- 99 50 06  STA $0650,Y
  420. 0379- 88        DEY
  421. 037A- 10 F7     BPL $0373
  422. 037C- 8C D5 BE  STY $BED5
  423. 037F- 8C DB BE  STY $BEDB
  424. 0382- 8C D6 BE  STY $BED6
  425. 0385- 8C DC BE  STY $BEDC
  426. 0388- C8        INY
  427. 0389- 98        TYA
  428. 038A- 38        SEC
  429. 038B- E5 04     SBC $04
  430. 038D- 85 04     STA $04
  431. 038F- 98        TYA
  432. 0390- E5 05     SBC $05
  433. 0392- 85 05     STA $05
  434. 0394- A9 AF     LDA #$AF
  435. 0396- 8D 5C 07  STA $075C
  436. 0399- A9 2F     LDA #$2F
  437. 039B- 8D 71 07  STA $0771
  438. 039E- A9 08     LDA #$08
  439. 03A0- 8D D4 BE  STA $BED4
  440. 03A3- 8D DA BE  STA $BEDA
  441. 03A6- 20 2E BE  JSR $BE2E
  442. 03A9- 20 F7 BD  JSR $BDF7
  443. 03AC- 20 00 BF  JSR $BF00
  444. 03AF- 80        ???
  445. 03B0- D1 BE     CMP ($BE),Y
  446. 03B2- 90 10     BCC $03C4
  447. 03B4- C6 06     DEC $06
  448. 03B6- D0 F4     BNE $03AC
  449. 03B8- 20 8B BE  JSR $BE8B
  450. 03BB- 8D D2 C5  STA $C5D2
  451. 03BE- C1 C4     CMP ($C4,X)
  452. 03C0- 00        BRK
  453. 03C1- 20 D4 BC  JSR $BCD4
  454. 03C4- E6 04     INC $04
  455. 03C6- D0 09     BNE $03D1
  456. 03C8- E6 05     INC $05
  457. 03CA- D0 05     BNE $03D1
  458. 03CC- EE D4 BE  INC $BED4
  459. 03CF- D0 0C     BNE $03DD
  460. 03D1- AD D4 BE  LDA $BED4
  461. 03D4- 69 02     ADC #$02
  462. 03D6- 8D D4 BE  STA $BED4
  463. 03D9- C9 B8     CMP #$B8
  464. 03DB- 90 CC     BCC $03A9
  465. 03DD- 20 2E BE  JSR $BE2E
  466. 03E0- 20 DE BD  JSR $BDDE
  467. 03E3- 20 00 BF  JSR $BF00
  468. 03E6- 81 D7     STA ($D7,X)
  469. 03E8- BE 90 11  LDX $1190,Y
  470. 03EB- C6 06     DEC $06
  471. 03ED- D0 F4     BNE $03E3
  472. 03EF- 20 8B BE  JSR $BE8B
  473. 03F2- 8D D7 D2  STA $D2D7
  474. 03F5- C9 D4     CMP #$D4
  475. 03F7- C5 00     CMP $00
  476. 03F9- 20 D4 BC  JSR $BCD4
  477. 03FC- AD DA BE  LDA $BEDA
  478. 03FF- 69 02     ADC #$02
  479. 0401- 8D DA BE  STA $BEDA
  480. 0404- CD D4 BE  CMP $BED4
  481. 0407- 90 D7     BCC $03E0
  482. 0409- A5 04     LDA $04
  483. 040B- 05 05     ORA $05
  484. 040D- D0 8F     BNE $039E
  485. 040F- 20 90 BE  JSR $BE90
  486. 0412- 8D 8D C3  STA $C38D
  487. 0415- EF        ???
  488. 0416- F0 F9     BEQ $0411
  489. 0418- A0 E4     LDY #$E4
  490. 041A- EF        ???
  491. 041B- EE E5 A0  INC $A0E5
  492. 041E- AD A0 E1  LDA $E1A0
  493. 0421- EE EF F4  INC $F4EF
  494. 0424- E8        INX
  495. 0425- E5 F2     SBC $F2
  496. 0427- BF        ???
  497. 0428- A0 00     LDY #$00
  498. 042A- 20 0C FD  JSR $FD0C
  499. 042D- 29 DF     AND #$DF
  500. 042F- C9 CE     CMP #$CE
  501. 0431- F0 07     BEQ $043A
  502. 0433- C9 D9     CMP #$D9
  503. 0435- D0 F3     BNE $042A
  504. 0437- 4C 2D BB  JMP $BB2D
  505. 043A- 4C CA BC  JMP $BCCA
  506. 043D- EE DB BE  INC $BEDB
  507. 0440- D0 03     BNE $0445
  508. 0442- EE DC BE  INC $BEDC
  509. 0445- A0 21     LDY #$21
  510. 0447- 20 10 BE  JSR $BE10
  511. 044A- AD DB BE  LDA $BEDB
  512. 044D- AE DC BE  LDX $BEDC
  513. 0450- 20 40 BE  JSR $BE40
  514. 0453- D0 E8     BNE $043D
  515. 0455- 60        RTS
  516. 0456- EE D5 BE  INC $BED5
  517. 0459- D0 03     BNE $045E
  518. 045B- EE D6 BE  INC $BED6
  519. 045E- A0 0C     LDY #$0C
  520. 0460- 20 10 BE  JSR $BE10
  521. 0463- AD D5 BE  LDA $BED5
  522. 0466- AE D6 BE  LDX $BED6
  523. 0469- 20 40 BE  JSR $BE40
  524. 046C- D0 E8     BNE $0456
  525. 046E- 60        RTS
  526. 046F- A9 04     LDA #$04
  527. 0471- 85 06     STA $06
  528. 0473- B9 50 07  LDA $0750,Y
  529. 0476- 29 3F     AND #$3F
  530. 0478- C9 20     CMP #$20
  531. 047A- D0 02     BNE $047E
  532. 047C- A9 30     LDA #$30
  533. 047E- 69 00     ADC #$00
  534. 0480- C9 3A     CMP #$3A
  535. 0482- D0 02     BNE $0486
  536. 0484- A9 30     LDA #$30
  537. 0486- 99 50 07  STA $0750,Y
  538. 0489- 88        DEY
  539. 048A- B0 E7     BCS $0473
  540. 048C- 60        RTS
  541. 048D- A0 21     LDY #$21
  542. 048F- B9 50 07  LDA $0750,Y
  543. 0492- C9 A0     CMP #$A0
  544. 0494- F0 05     BEQ $049B
  545. 0496- 49 80     EOR #$80
  546. 0498- 99 50 07  STA $0750,Y
  547. 049B- 88        DEY
  548. 049C- D0 F1     BNE $048F
  549. 049E- 60        RTS
  550. 049F- 86 01     STX $01
  551. 04A1- 48        PHA
  552. 04A2- 46 01     LSR $01
  553. 04A4- 6A        ROR
  554. 04A5- 46 01     LSR $01
  555. 04A7- 6A        ROR
  556. 04A8- 46 01     LSR $01
  557. 04AA- 6A        ROR
  558. 04AB- 85 00     STA $00
  559. 04AD- A5 01     LDA $01
  560. 04AF- 18        CLC
  561. 04B0- 69 B8     ADC #$B8
  562. 04B2- 85 01     STA $01
  563. 04B4- 68        PLA
  564. 04B5- 29 07     AND #$07
  565. 04B7- AA        TAX
  566. 04B8- BD 61 BE  LDA $BE61,X
  567. 04BB- A0 00     LDY #$00
  568. 04BD- 31 00     AND ($00),Y
  569. 04BF- 60        RTS
  570. 04C0- 80        ???
  571. 04C1- 40        RTI
  572. 04C2- 20 10 08  JSR $0810
  573. 04C5- 04        ???
  574. 04C6- 02        ???
  575. 04C7- 01 AE     ORA ($AE,X)
  576. 04C9- C0 02     CPY #$02
  577. 04CB- A0 00     LDY #$00
  578. 04CD- B9 C1 02  LDA $02C1,Y
  579. 04D0- 09 80     ORA #$80
  580. 04D2- 20 ED FD  JSR $FDED
  581. 04D5- C8        INY
  582. 04D6- CA        DEX
  583. 04D7- D0 F4     BNE $04CD
  584. 04D9- 60        RTS
  585. 04DA- AC 31 BF  LDY $BF31
  586. 04DD- AA        TAX
  587. 04DE- 8A        TXA
  588. 04DF- 59 32 BF  EOR $BF32,Y
  589. 04E2- 29 F0     AND #$F0
  590. 04E4- F0 03     BEQ $04E9
  591. 04E6- 88        DEY
  592. 04E7- 10 F5     BPL $04DE
  593. 04E9- 60        RTS
  594. 04EA- A9 0A     LDA #$0A
  595. 04EC- 20 5B FB  JSR $FB5B
  596. 04EF- 68        PLA
  597. 04F0- 85 00     STA $00
  598. 04F2- 68        PLA
  599. 04F3- 85 01     STA $01
  600. 04F5- D0 03     BNE $04FA
  601. 04F7- 20 ED FD  JSR $FDED
  602. 04FA- A0 00     LDY #$00
  603. 04FC- E6 00     INC $00
  604. 04FE- D0 02     BNE $0502
  605. 0500- E6 01     INC $01
  606. 0502- B1 00     LDA ($00),Y
  607. 0504- D0 F1     BNE $04F7
  608. 0506- A5 01     LDA $01
  609. 0508- 48        PHA
  610. 0509- A5 00     LDA $00
  611. 050B- 48        PHA
  612. 050C- 60        RTS
  613. 050D- A0 A0     LDY #$A0
  614. 050F- D3        ???
  615. 0510- EF        ???
  616. 0511- F5 F2     SBC $F2,X
  617. 0513- E3        ???
  618. 0514- E5 A0     SBC $A0
  619. 0516- E2        ???
  620. 0517- EC EF E3  CPX $E3EF
  621. 051A- EB        ???
  622. 051B- A0 A0     LDY #$A0
  623. 051D- A0 A0     LDY #$A0
  624. 051F- C4 E5     CPY $E5
  625. 0521- F3        ???
  626. 0522- F4        ???
  627. 0523- E9 EE     SBC #$EE
  628. 0525- E1 F4     SBC ($F4,X)
  629. 0527- E9 EF     SBC #$EF
  630. 0529- EE A0 E2  INC $E2A0
  631. 052C- EC EF E3  CPX $E3EF
  632. 052F- EB        ???
  633. 0530- 03        ???
  634. 0531- 60        RTS
  635. 0532- 00        BRK
  636. 0533- 08        PHP
  637. 0534- 00        BRK
  638. 0535- 00        BRK
  639. 0536- 03        ???
  640. 0537- E0 00     CPX #$00
  641. 0539- 08        PHP
  642. 053A- 00        BRK
  643. 053B- 00        BRK
  644. 053C- 0A        ASL
  645. 053D- C0 02     CPY #$02
  646. 053F- 00        BRK
  647. 0540- 00        BRK
  648. 0541- 00        BRK
  649. 0542- 00        BRK
  650. 0543- 00        BRK
  651. 0544- 00        BRK
  652. 0545- 00        BRK
  653. 0546- 00        BRK
  654. 0547- 00        BRK
  655. 0548- 00        BRK
  656. 0549- 00        BRK
  657. 054A- 00        BRK
  658. 054B- 00        BRK
  659. 054C- 00        BRK
  660. 054D- 00        BRK
  661. 054E- 02        ???
  662. 054F- 60        RTS
  663. 0550- C1 02     CMP ($02,X)
  664. 0552- 04        ???
  665. 0553- 00        BRK
  666. 0554- 00        BRK
  667. 0555- 00        BRK
  668. 0556- 00        BRK
  669. 0557- 00        BRK
  670. 0558- 00        BRK
  671.